home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 23 / CU Amiga - Super CD-ROM 23 (June 1998).iso / CUCD / Online / BookCon / Language_install < prev   
Encoding:
Text File  |  1998-03-24  |  1.9 KB  |  90 lines
  1. ; $VER BookCon-Installer 1.0 (24-Mar-98)
  2. ; Installer made by Stefan Blixth, OnyxSoft
  3.  
  4. (set #welcome "\nWelcome to BookCon 1.4 locale-installer.\n© 1997-98 Stefan Blixth, OnyxSoft.\n\nCheck our homepage for further information\n\nhttp://www.alfaskop.net/~onyxsoft\n")
  5. (set #ato "All this translations where made by ATO,\nAmiga Translators' Organization.\n\nURL - http://ato.vapor.com/ato/\n") 
  6. (set #end "The locale files are hopefully now installed :-)\n\nTry to reboot if it's not recognized imidiately.")
  7.  
  8. (set #srcdir "")
  9.  
  10. ; Welcome-text...
  11.  
  12. (message #welcome)
  13. (welcome)
  14. (complete 0)
  15.  
  16. (message #ato)
  17. (complete 50)
  18.  
  19. (set var_lang
  20.  (askchoice
  21.   (prompt "Select what language you want to use:")
  22.   (help @langhelp)
  23.   (choices "English (built in)" "Hrvatski" "Italiano" "Português" "Srpski" "Svenska" "ÃeÓtina")
  24.  )
  25. )
  26.  
  27. (if (= 1 var_lang)
  28.   (
  29.    (if (exists "LOCALE:Catalogs/hrvatski") 
  30.     (copyfiles
  31.      (source "Catalogs/hrvatski/BookCon.catalog")
  32.      (dest "LOCALE:Catalogs/hrvatski/")
  33.     )
  34.    )
  35.   )
  36. )
  37. (if (= 2 var_lang)
  38.   (
  39.    (if (exists "LOCALE:Catalogs/italiano")
  40.     (copyfiles
  41.      (source "Catalogs/italiano/BookCon.catalog")
  42.      (dest "LOCALE:Catalogs/italiano/")
  43.     )
  44.    )
  45.   )
  46. )
  47. (if (= 3 var_lang)
  48.   (
  49.    (if (exists "LOCALE:Catalogs/português")
  50.     (copyfiles
  51.      (source "Catalogs/português/BookCon.catalog")
  52.      (dest "LOCALE:Catalogs/português/")
  53.     )
  54.    )
  55.   )
  56. )
  57. (if (= 4 var_lang)
  58.   (
  59.    (if (exists "LOCALE:Catalogs/srpski")
  60.     (copyfiles
  61.      (source "Catalogs/srpski/BookCon.catalog")
  62.      (dest "LOCALE:Catalogs/srpski/")
  63.     )
  64.    )
  65.   )
  66. )
  67. (if (= 5 var_lang)
  68.   (
  69.    (if (exists "LOCALE:Catalogs/svenska")
  70.     (copyfiles
  71.      (source "Catalogs/svenska/BookCon.catalog")
  72.      (dest "LOCALE:Catalogs/svenska/")
  73.     )
  74.    )
  75.   )
  76. )
  77. (if (= 6 var_lang)
  78.   (
  79.    (if (exists "LOCALE:Catalogs/ÃeÓtina")
  80.     (copyfiles
  81.      (source "Catalogs/ÃeÓtina/BookCon.catalog")
  82.      (dest "LOCALE:Catalogs/ÃeÓtina/")
  83.     )
  84.    )
  85.   )
  86. )
  87.  
  88. (complete 100)
  89. (message #end)
  90. (exit)